home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Dr. Windows 3
/
dr win3.zip
/
dr win3
/
PROGRAMR
/
LB09D.ZIP
/
READ.BAS
< prev
next >
Wrap
BASIC Source File
|
1992-03-28
|
214b
|
14 lines
'read testfile and display each item on its own line
open "testfile" for input as #in
[read]
while eof(#in) = 0
input #in, string$
print string$
wend
close #in